home *** CD-ROM | disk | FTP | other *** search
/ Hyper Erect Magazine / Hyper Erect Magazine - Disc 2.iso / pc / menu.dxr / 00001.ls next >
Encoding:
Text File  |  1997-04-12  |  2.4 KB  |  100 lines
  1. on startMovie
  2.   global gmtype, gvol
  3.   unloadMovie(the text of member "fDeleteMovie")
  4.   set the text of member "fDeleteMovie" to "MENU"
  5.   initqtvr()
  6.   set the cursor of sprite 2 to [member "YUBI", member "YUBIM"]
  7.   repeat with i = 10 to 17
  8.     set the visible of sprite i to 0
  9.     set the cursor of sprite i to [member "YUBI", member "YUBIM"]
  10.   end repeat
  11.   set the visible of sprite 18 to 1
  12.   set the cursor of sprite 18 to [member "YUBI", member "YUBIM"]
  13.   set the visible of sprite (gvol + 10) to 1
  14.   set the visible of sprite 30 to 1
  15.   puppetSound("MAIN")
  16.   updateStage()
  17. end
  18.  
  19. on stopMovie
  20.   endqtvr()
  21. end
  22.  
  23. on checkhotspot
  24.   global gQTVRObj
  25.   set the text of member "fQTVRPanAngle" to qtvrgetpanangle(gQTVRObj)
  26.   set the text of member "fQTVRTiltAngle" to qtvrgettiltangle(gQTVRObj)
  27.   case the text of member "fQTVRHotSpot" of
  28.     "15":
  29.       set the text of member "fMovieNumber" to "9"
  30.       puppetSound("CLICK")
  31.       updateStage()
  32.       waittimer(1)
  33.       go("JUMP_M")
  34.     "69":
  35.       set the text of member "fMovieNumber" to "8"
  36.       puppetSound("CLICK")
  37.       updateStage()
  38.       waittimer(1)
  39.       go("JUMP_M")
  40.     "241":
  41.       set the text of member "fMovieNumber" to "7"
  42.       puppetSound("CLICK")
  43.       updateStage()
  44.       waittimer(1)
  45.       go("JUMP_M")
  46.     "193":
  47.       set the text of member "fMovieNumber" to "6"
  48.       puppetSound("CLICK")
  49.       updateStage()
  50.       waittimer(1)
  51.       go("JUMP_M")
  52.     "196":
  53.       set the text of member "fMovieNumber" to "5"
  54.       puppetSound("CLICK")
  55.       updateStage()
  56.       waittimer(1)
  57.       go("JUMP_M")
  58.     "11":
  59.       set the text of member "fMovieNumber" to "4"
  60.       puppetSound("CLICK")
  61.       updateStage()
  62.       waittimer(1)
  63.       go("JUMP_M")
  64.     "70":
  65.       set the text of member "fMovieNumber" to "3"
  66.       puppetSound("CLICK")
  67.       updateStage()
  68.       waittimer(1)
  69.       go("JUMP_M")
  70.     "30":
  71.       set the text of member "fMovieNumber" to "2"
  72.       puppetSound("CLICK")
  73.       updateStage()
  74.       waittimer(1)
  75.       go("JUMP_M")
  76.     "210":
  77.       set the text of member "fMovieNumber" to "1"
  78.       puppetSound("CLICK")
  79.       updateStage()
  80.       waittimer(1)
  81.       go("JUMP_M")
  82.     "180":
  83.       puppetSound("CLICK")
  84.       updateStage()
  85.       waittimer(1)
  86.       go("QUIT")
  87.     "185":
  88.       puppetSound(0)
  89.       updateStage()
  90.       waittimer(1)
  91.       go("PANIC")
  92.     "5":
  93.       waittimer(1)
  94.       go("HELP")
  95.     "35":
  96.       waittimer(1)
  97.       go("SOUND")
  98.   end case
  99. end
  100.